home *** CD-ROM | disk | FTP | other *** search
/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / games / _kalaha / source / c / misc < prev    next >
Encoding:
Text File  |  1992-03-04  |  1.6 KB  |  110 lines
  1.  
  2. /* fiddly bits */
  3.  
  4. #include "kalaha.h"
  5.  
  6.  
  7. int which_layer(int p)
  8. { 
  9. int res;
  10.  
  11. res = OTHERLAY;
  12. if (p>=0 && p<6)
  13.   res = BOTLAY;
  14. if (p>=7 && p<13)
  15.   res = TOPLAY;
  16. if (p==6)
  17.   res = MIDRIGHT;
  18. if (p==13)
  19.   res = MIDLEFT;
  20. return res;
  21. }
  22.    
  23.  
  24.  
  25. void set_icon_select_state(wimp_w w, int i, BOOL on)
  26. {
  27. int v;
  28. if (on)
  29.   v = wimp_ISELECTED;
  30. else
  31.   v = 0;
  32. wimpt_noerr(wimp_set_icon_state(w, i, v, wimp_ISELECTED));
  33. }
  34.  
  35.  
  36.  
  37. void write_iconnum(int n, wimp_i i)
  38. {
  39. wimp_wind  *windp;
  40. wimp_icon  *iconp;
  41. char       *icontext;
  42.  
  43. windp = template_syshandle("main_window");
  44. if (windp == 0)
  45.   werr(TRUE, "Fatal internal error ( %d )", __LINE__);
  46. iconp = (wimp_icon  *)(windp+1);
  47. icontext = iconp[i].data.indirecttext.buffer;
  48. sprintf(icontext, "%d", n);
  49. }
  50.  
  51.  
  52.  
  53. void force_whole_wind_redraw(void)
  54. {
  55. wimp_redrawstr r;   
  56.  
  57. r.w = main_window_handle;
  58. r.box.x0 = 0;
  59. r.box.y0 = -WINDHT;
  60. r.box.x1 = 2*SIDEBORDER + 6*HOLLWID;
  61. r.box.y1 = 0;
  62. wimpt_noerr(wimp_force_redraw(&r));
  63. }
  64.  
  65.  
  66.  
  67. void find_hollow_box(wimp_box *b, int p)
  68. {
  69. switch (which_layer(p))
  70.   {
  71.   case BOTLAY:
  72.   b->x0 = SIDEBORDER+HOLLWID*p;
  73.   b->y0 = BOTROW;
  74.   b->x1 = SIDEBORDER+HOLLWID*(p+1);
  75.   b->y1 = BOTROW + 200;
  76.   break;
  77.  
  78.   case TOPLAY:
  79.   b->x0 = SIDEBORDER+HOLLWID*(12-p);
  80.   b->y0 = TOPROW;
  81.   b->x1 = SIDEBORDER+HOLLWID*(13-p);
  82.   b->y1 = TOPROW + 200;
  83.   break;
  84.  
  85.   case MIDLEFT:
  86.   b->y0 = MIDROW;
  87.   b->y1 = MIDROW + 200;
  88.   b->x0 = 0;
  89.   b->x1 = SIDEBORDER+HOLLWID*2;
  90.   break;
  91.  
  92.   case MIDRIGHT:
  93.   b->y0 = MIDROW;
  94.   b->y1 = MIDROW + 200;
  95.   b->x0 = SIDEBORDER+HOLLWID*4;
  96.   b->x1 = SIDEBORDER+HOLLWID*6;
  97.   break;
  98.  
  99.   case OTHERLAY:  
  100.   b->y0 = MIDROW;
  101.   b->y1 = MIDROW + 200;
  102.   b->x0 = SIDEBORDER+HOLLWID*2;
  103.   b->x1 = SIDEBORDER+HOLLWID*4;
  104.   break;
  105.   }
  106. return;
  107. }
  108.  
  109.  
  110.